--  This package is intended to set up and tear down  the test environment.
--  Once created by GNATtest, this package will never be overwritten
--  automatically. Contents of this package can be modified in any way
--  except for sections surrounded by a 'read only' marker.

with AUnit.Test_Fixtures;

with Ada.Exceptions;

package Stackcheck.Files.Test_Data is

--  begin read only
   type Test is new AUnit.Test_Fixtures.Test_Fixture
--  end read only
   with null record;

   procedure Set_Up (Gnattest_T : in out Test);
   procedure Tear_Down (Gnattest_T : in out Test);

   use Ada.Strings.Unbounded;

   --  Control-flow reference CI file paths.
   Ref_CI_Paths : constant Path_Names (1 .. 4)
     := (To_Unbounded_String ("obj/testci/testci.ci"),
         To_Unbounded_String ("obj/testci/foo.ci"),
         To_Unbounded_String ("obj/liblog/log.ci"),
         To_Unbounded_String ("obj/libbar/bar.ci"));

end Stackcheck.Files.Test_Data;
